The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
Changes 06
MANIFEST 01
META.yml 22
README 11
lib/CPAN/Inject.pm 66
script/cpaninject 45
t/data/Config-Tiny-2.09.tar.gz --
7 files changed (This is a version diff) 1321
@@ -1,5 +1,11 @@
 Revision history for Perl extension CPAN-Inject
 
+1.13 Wed 5 Jan 2011
+	- Bumped minimum version of Perl to 5.006 (ADAMK)
+	- Test pass with a non-existant ~/.cpan (BOGDAN)
+	- Tests tweaked for better failure into (SZABGAB)
+	- Fixing missing tarball in distribution (ADAMK)
+
 1.12 Sat 18 Dec 2010
 	- Moving to a production version
 	- Updating Module::Install to 1.00
@@ -17,6 +17,7 @@ README
 script/cpaninject
 t/01_compile.t
 t/02_main.t
+t/data/Config-Tiny-2.09.tar.gz
 xt/meta.t
 xt/pmv.t
 xt/pod.t
@@ -31,9 +31,9 @@ requires:
   File::chmod: 0.30
   File::stat: 1.00
   Params::Util: 0.21
-  perl: 5.005
+  perl: 5.6.0
 resources:
   ChangeLog: http://fisheye2.atlassian.com/changelog/cpan/trunk/CPAN-Inject
   license: http://dev.perl.org/licenses/
   repository: http://svn.ali.as/cpan/trunk/CPAN-Inject
-version: 1.12
+version: 1.13
@@ -192,7 +192,7 @@ SEE ALSO
     CPAN::Mini::Inject
 
 COPYRIGHT
-    Copyright 2006 - 2010 Adam Kennedy.
+    Copyright 2006 - 2011 Adam Kennedy.
 
     This program is free software; you can redistribute it and/or modify it
     under the same terms as Perl itself.
@@ -49,9 +49,9 @@ and sub-classable, so that it can be reused in other situations.
 
 =cut
 
-use 5.005;
+use 5.006;
 use strict;
-use Params::Util    '_STRING';
+use Params::Util    ();
 use File::stat      ();
 use File::chmod     ();
 use File::Spec      ();
@@ -63,7 +63,7 @@ use CPAN::Checksums ();
 use vars qw{$VERSION $CHECK_OWNER};
 
 BEGIN {
-	$VERSION = '1.12';
+	$VERSION = '1.13';
 
 	# Attempt to determine whether or not we are capable
 	# of finding the owner of a directory.
@@ -136,7 +136,7 @@ sub new {
 
 	# Check where we are going to write to
 	my $sources = $self->sources;
-	unless ( _STRING($sources) ) {
+	unless ( Params::Util::_STRING($sources) ) {
 		Carp::croak("Did not probide a sources param, or not a string");
 	}
 	unless ( -d $sources ) {
@@ -473,7 +473,7 @@ sub install_path {
 # Support Functions
 
 sub _AUTHOR {
-	( _STRING( $_[0] ) and $_[0] =~ /^[A-Z]{3,}$/ ) ? $_[0] : undef;
+	( Params::Util::_STRING( $_[0] ) and $_[0] =~ /^[A-Z]{3,}$/ ) ? $_[0] : undef;
 }
 
 1;
@@ -518,7 +518,7 @@ L<CPAN::Mini::Inject>
 
 =head1 COPYRIGHT
 
-Copyright 2006 - 2010 Adam Kennedy.
+Copyright 2006 - 2011 Adam Kennedy.
 
 This program is free software; you can redistribute
 it and/or modify it under the same terms as Perl itself.
@@ -41,13 +41,14 @@ Perl module that might have a dozen or more CPAN dependencies.
 
 package cpaninject;
 
+use 5.006;
 use strict;
-use Params::Util '_STRING';
+use Params::Util ();
 use CPAN::Inject;
 
 use vars qw{$VERSION};
 BEGIN {
-	$VERSION = '1.12';
+	$VERSION = '1.13';
 }
 
 
@@ -62,7 +63,7 @@ unless ( @ARGV ) {
 }
 
 # Get the file name
-my $file = _STRING(shift @ARGV);
+my $file = Params::Util::_STRING(shift @ARGV);
 unless ( $file ) {
 	error("Did not provide a file name");
 }
@@ -126,7 +127,7 @@ L<CPAN::Mini::Inject>
 
 =head1 COPYRIGHT
 
-Copyright 2006 - 2010 Adam Kennedy.
+Copyright 2006 - 2011 Adam Kennedy.
 
 This program is free software; you can redistribute
 it and/or modify it under the same terms as Perl itself.
diff --git a/var/tmp/source/ADAMK/CPAN-Inject-1.13/CPAN-Inject-1.13/t/data/Config-Tiny-2.09.tar.gz b/var/tmp/source/ADAMK/CPAN-Inject-1.13/CPAN-Inject-1.13/t/data/Config-Tiny-2.09.tar.gz
new file mode 100644
index 00000000..65e28116
Binary files /dev/null and b/var/tmp/source/ADAMK/CPAN-Inject-1.13/CPAN-Inject-1.13/t/data/Config-Tiny-2.09.tar.gz differ